home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
BBS Toolkit
/
BBS Toolkit.iso
/
qbbs
/
qbbs276s.zip
/
NICK-E.ZIP
/
SETUP.ZIP
/
LB.BAT
< prev
next >
Wrap
DOS Batch File
|
1992-03-12
|
4KB
|
215 lines
ECHO OFF
CD\QBBS
:FIRST
cd\qbbs\node3
C:\QBBS\quickbbs -e0 -l
:START
IF ERRORLEVEL = 201 GOTO MAINT
IF ERRORLEVEL = 200 GOTO MAINT
IF ERRORLEVEL = 199 GOTO MAINT
IF ERRORLEVEL = 130 GOTO RATS
IF ERRORLEVEL = 121 GOTO MAINT
IF ERRORLEVEL = 115 GOTO FILEDOOR
IF ERRORLEVEL = 110 GOTO ESTERIAN
IF ERRORLEVEL = 100 GOTO GLOBAL
IF ERRORLEVEL = 97 GOTO VOTEEDIT
IF ERRORLEVEL = 95 GOTO VOTE
IF ERRORLEVEL = 90 GOTO TW2002
IF ERRORLEVEL = 85 GOTO PIT
IF ERRORLEVEL = 80 GOTO SINBAUD
IF ERRORLEVEL = 75 GOTO BARONS
IF ERRORLEVEL = 70 GOTO EC2
IF ERRORLEVEL = 65 GOTO CC
IF ERRORLEVEL = 60 GOTO YANKEE
IF ERRORLEVEL = 50 GOTO FISHING
IF ERRORLEVEL = 7 GOTO BACKIN
IF ERRORLEVEL = 5 GOTO END
IF ERRORLEVEL = 1 GOTO REBOOT
IF ERRORLEVEL = 0 GOTO END
echo It passed errorlevel 0
echo it passed errorlevel 0 >testing.txt
GOTO FIRST
:MAINT
CD\
EXIT
:RATS
CONVERT2
CD \QBBS\RATS
RATS121 /N2
CD \QBBS\NODE2
CONVERT2
QUICKBBS.EXE -R -e5
GOTO START
:SINBAUD
CD\QBBS\DOORS\SIN
IF EXIST USERON.XXX GOTO USERON
COPY \QBBS\USERON.XXX
CD\QBBS\DOORS
DM 1 GAP C:\QBBS\NODE2\ C:\QBBS\DOORS\SIN\ 38400
CD\QBBS\DOORS\SIN
SINBAUD /NOPAGE
DEL USERON.XXX
CD\QBBS\NODE2
QUICKBBS.EXE -r -e5
GOTO START
:ESTERIAN
CD\QBBS\DOORS\EC
IF EXIST USERON.XXX GOTO USERON
COPY \QBBS\USERON.XXX
ECGAME.EXE C:\QBBS\NODE2\DORINFO1.DEF
DEL USERON.XXX
CD\QBBS\NODE2
QUICKBBS.EXE -r -e5
GOTO START
:CC
@ECHO OFF
CD\QBBS\DOORS\CC
IF EXIST USERON.XXX GOTO USERON
COPY \QBBS\USERON.XXX
CARIB25 CARIB02.CFG PORT:F:1
DEL USERON.XXX
CD\QBBS\NODE2
QUICKBBS.EXE -r -e5
GOTO START
:GLOBAL
ECHO OFF
ECHO ┌─────────────────┐ >COM1
ECHO │ Global Wars │ >COM1
ECHO └─────────────────┘ >COM1
CD\QBBS\DOORS\GLOBAL
IF EXIST USERON.XXX GOTO USERON
COPY \QBBS\USERON.XXX
CD\QBBS\DOORS
DM 1 PCB14 C:\QBBS\NODE2\ C:\QBBS\DOORS\GLOBAL\ 38400
CD GLOBAL
WAR /P \QBBS\DOORS\GLOBAL\PCBOARD.SYS
DEL USERON.XXX
CD\QBBS\NODE2
QUICKBBS.EXE -r -e5
GOTO START
:VOTEEDIT
C:
CD \qbbs\doors\VOTE
RPE.EXE 1 C:\QBBS\NODE2 QBBS
C:
CD \QBBS\NODE2
QUICKBBS.EXE -r -e5
GOTO START
:VOTE
CD\QBBS\DOORS\VOTE
IF EXIST USERON.XXX GOTO USERON
COPY \QBBS\USERON.XXX
OPINION 1 C:\QBBS\NODE2 QBBS
DEL USERON.XXX
C:
CD\QBBS\NODE2
QUICKBBS.EXE -r -e5
GOTO START
:TW2002
ECHO OFF
ECHO ┌─────────────────┐ >COM1
ECHO │ Trade Wars 2002 │ >COM1
ECHO └─────────────────┘ >COM1
CD\QBBS\TRADEWAR
IF EXIST USERON.XXX GOTO USERON
COPY \QBBS\USERON.XXX
TW2002.EXE -QBBS
DEL USERON.XXX
CD\QBBS\NODE2
QUICKBBS.EXE -r -e5
GOTO START
:PIT
CD\QBBS\DOORS\PIT
IF EXIST USERON.XXX GOTO USERON
COPY \QBBS\USERON.XXX
PIT.EXE
DEL USERON.XXX
CD\QBBS\NODE2
QUICKBBS.EXE -r -e5
GOTO START
:BARONS
CD\QBBS\DOORS\BARONS
IF EXIST USERON.XXX GOTO USERON
COPY \QBBS\USERON.XXX
CD\QBBS\NODE2
COPY DORINFO1.DEF DORINFO1.BAK
SOFTBAUD D 38400
CD \QBBS\DOORS\BARONS
BARONS 1 C:\QBBS\NODE2 QBBS
DEL USERON.XXX
CD \QBBS\NODE2
COPY DORINFO1.BAK DORINFO1.DEF
QUICKBBS.EXE -r -e5
GOTO START
:EC2
CD\QBBS\DOORS\EC2
IF EXIST USERON.XXX GOTO USERON
COPY \QBBS\USERON.XXX
ECGAME.EXE C:\QBBS\NODE2\DORINFO1.DEF
DEL USERON.XXX
CD\QBBS\NODE2
QUICKBBS.EXE -r -e5
GOTO START
:YANKEE
CD\QBBS\DOORS\YT
IF EXIST USERON.XXX GOTO USERON
COPY \QBBS\USERON.XXX
YT.EXE C:\QBBS\NODE2\DORINFO1.DEF
DEL USERON.XXX
CD\QBBS\NODE2
QUICKBBS.EXE -r -e5
GOTO START
:FISHING
CD\QBBS\DOORS\FISH
IF EXIST USERON.XXX GOTO USERON
COPY \QBBS\USERON.XXX
FISHING 1 C:\QBBS\NODE2 /B38400
IF EXIST DOOR_IN.USE DEL DOOR_IN.USE
DEL USERON.XXX
CD\QBBS\NODE2
QUICKBBS.EXE -r -e5
GOTO START
:FILEDOOR
C:
cd \QBBS\FILEDOOR
filedoor 1 C:\QBBS\NODE2 QBBS
C:
cd \QBBS\NODE2
QUICKBBS.EXE -r -e5
GOTO START
:USERON
ECHO Sorry, a user is currently in this door and it does not support >COM2
ECHO multi-node use, try again in a few minutes. >COM2
CD\QBBS\NODE2
QUICKBBS.EXE -R -E5
:BACKIN
CD\QBBS\NODE2
Echo Now back to the BBS, was that door registered? >COM2
QUICKBBS.EXE -E0 -R
GOTO START
:REBOOT
XU BOOT
:END
Echo Yep, all done folks!